perm filename TTTT[2,LCS] blob sn#308321 filedate 1977-10-06 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	 
C00008 ENDMK
C⊗;
 
INSTRUMENT TOOTA;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT CLAR;     
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;